UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU UUU  VVV VVV 1171111 RRR RRR 000 000 MMMMMM = =6>MMMMMM 
UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM = 6MMMMMM 

UUU UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM ~=6MMMMMM 
UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM MMM 
UU VVV VVV 111 RRR RRR 000 000 MMM MMM = MMM 

UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM = =6MMM 
UU VV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU  ~VVV VVV 111 RRR = RRR 000 000 MMM MMM 
UUU UUU  VVV VVV 111 RRR = =RRR 000 000 MMM MMM 
UUU UUU 111 RRR = RRR 000 000 MMM MMM 
UUU UUU vVvvV VV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvVsOVVV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvV OV 111 RRR RRR 000 000 MMM MMM 
UU 1911711711 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117171111 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117111111 RRR RRR 000000000 MMM MMM 


**F ILE**1D**BOOT1OUVI 


BBBBBBBB 000000 000000 Peri IIII11 000000 UU UU VV VV 11 
BBBBBBBB 000000 000000 TITTTTITT III! 000000 UU UU VV VV 11 
8B BB 00 00 00 00 TT i 00 00 UU UU VV VV 1111 
BB BB 00 00 00 00 TT 1 00 00 UU UU VV VV 1111 
BB BB 00 00 00 00 TT I] 00 00 UU UU VV VV 11 
BB BB 00 00 00 00 TT II 00 00 UU UU VV VV 11 
BBBBBBBB 00 00 00 00 TT I! 00 00 UU UU VV VV 11 
BBBBBBBB 00 00 00 00 TT I! 00 00 UU UU VV VV 11 
BB BB 00 00 00 00 TT II 00 00 UU UU VV VV 11 
BB BB 00 00 00 00 TT II 00 00 UU UU VV vv 11 
BB BB 00 00 00 00 TT I! 00 00 UU UU VV VV 11 eee 
BB BB 00 00 00 00 TT i 00 00 UU UU ve WV 11 eee 
BBB8BBBB 000000 000000 TT IIIT] 000000 UUUUUUUUUU VV 111111 cece 
BBBBBBBB 000000 000000 TT III! 000000 UUUUUUUUUU vv 111111 cove 
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Bove Tian -R Nite cin} b GICAL BLOCK NUMBER 
4h 4th - mu READ 
image attributes from image header 


Common 3 Sule” — VMB and SYS 


Tab 
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£088 808 ; Boot -UVI_SWITCH = a ; Build Micro-VAX I bootstrap emulator 


Ate BOoT 104 ~ BOOTSTRAP FILEREAD 10 MODULE FOR MICRO-VAX | 


MPARRARAAARAALALAAALAAR AEE ALA EERE SAREE ERE S SERRE EERE ERS R RARER RE REESE ERR R REESE SD 


cor The cout e 1978, 1980, 1982, 1983 BY 


z= Te 


ITA PRENT _GORPORATION, MAYNARD, MASSACHUSETTS. 
RIGHTS R 
SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
I CCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
ON OF TH NEN ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
§ TH REOF MAY Not BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
ER NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
orRPORAT be NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONS BI 


IBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH 


L 
SN oT SUPPLIED BY DIGITAL. 
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"FACILITY: SYSTEM BOOTSTRAPPING 
ABSTRACT: 

THIS MODULE PERFORMS LOGICAL BLOCK I/O FOR FILEREAD 
ENVIRONMENT: KERNEL MODE, UNMAPPED, IPL=31 
AUTHOR: RICHARD I. HUSTVEDT , CREATION DATE: 14-APR-78 
MODIFIED BY: 


v03-002 EDROOTO Kathleen D. Morse 11-Aug-1983 
Create Micro-VAX | version, via peseubly switch, 
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-JUL=1 AMACHE -OVTROM. VMS SBO0TIO.MARo! § 


: INCLUDE FILES: 


SIHDDEF ; IMAGE HEADER DEFINITIONS 

SIHSDEF ; IMAGE HEADER SYMBOL TABLE DEFS 
SIHPDEF ; IMAGE HEADER PATCH CONTROL DEFS 
SRPBDEF ; DEFINE RESTART PARAMETER BLOCK 


: MACROS: 
Define Memory Size to File Cache Parameter table entry 
«MACRO MEM_ PILE CACHE MEM_PAGE_CNT CACHE PAGE NUM. CACHE PAGE CHT .RAK_PAGE 
LONG ER PAGE» CNT-<MER_ PaGe_CNT/{ 
WORD ACRE NUM 
“WORD <<CACRE Apaee _CNT+3>8*C<3>> 


-LO MAX_PA 
«ENDM MEM_FILE_CACHE 
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9 ~PSECT YFILEREAD BYTE ,EXE 
ae -SBTTL RODWRTLBN = READ/WRITE LOGICAL BLOCK NUMBER 
; FUNCTIONAL DESCRIPTION: 


; THIS ROUTINE READS/WRITES N BYTES FROM/TO THE SPEC 
: LOGICAL BLOCK NUMBER OF THE VOLUME ASSIGNED TO THE SPECI 


; CALLING SEQUENCE: 

CALLG) ARGLIST,FILSRDWRITLBN 

; INPUT PARAMETERS: 

itt 
NCAP) 

BUF ADR (AP) 

IOFUNC (AP) 

BYTCNT (AP) 

; IMPLICIT INPUTS: 


: NONE 


0000 


IFIED 
FIED CHANNEL 


CHANNEL ASSIGNED TO = VOLUME TO READ 
Hitt ry BLOCK NUMBER TO READ 
DDRESS OF BUFFER TO READ INTO 
£170 FUNCTION CODE 
;NUMBER OF BYTES TO TRANSFER 


DOOOCOCOGOGCOOOOOOOCOOOOSo 


SoOOOSCSCSOSCOSOOSCOOSCOOSOOOOOOSOOSOSOOoSoOS 
oooo 


SOOOCSCOOOSOSOSOOOSOSOSOSSOSOSOSOOSOOSOOOOSOoOSoOS 


OOO OOO DOOODOOOOOO YY 
MEW 0 OD NAME WP CO ODNAUE UT 


; OUTPUT PARAMETERS: 
: RO = SYSTEM STATUS CODE 
: IMPLICIT OUTPUTS: 
NONE 
: COMPLETION CODES: 
: NONE 
; SIDE EFFECTS: 
NONE 
: EQUATED SYMBOLS: 
: OFFSETS FROM AP 
CHAN 


ono 
NO 


SOoOooooooooooo°oo 


OCOOOCOCOCOCOOSSOSSOSOSOSGSOSCOSCOOSOOOCOOCOOOOOOOOOOOOOOOO 


OOONA ULE WN—OOe 


Sssss 


:LOGICAL TO WHICH VOLUME IS ASSIGNED 
AL BLOCK NUMBER 
FER ADDRESS TO READ INTO 
ION CODE FOR THE Q10 
R OF BYTES TO TRANSFER 


tM QOOOOOOOCOCSO 


wo 

—_ 

wn" 

> 

o 

>) 

onunn 

moos 
Oomr 


BYTCNT 


FILSROWRTLBN:: 
wO 


, 0 
PUSHL CHAN(AP) ; ADDRESS OF RPB 
MOVL (SP) ,RO ; GET ADDRESS OF RPB 


ma etd = et = ts 4 — 3 
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= BOO 
RDWRTL 


TSTRAP 
BN - R 


FILEREAD 

EAD/WRITE LOGICAL BLOCK NUMB 9=JUL~ 
127 RPBSL_IOVEC(RO) ,RO 
138 PUSHL 

1 PUSHL  IOFUNC (AP) 

130 PUSHL —_ LBN(AP) 

1 PUSHL BYTCNT(AP) 

1 § PUSHAL @BUFADR(AP) 

138 CALLS” #6,a(RO)CROJ 
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POINTER TO 1/0 ROUTINE VECTOR 
O PHYSICAL ADDRESS 


CO 
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~SBTTL BOOSCACHE_INIT = INIT FILEREAD CACHE 


vOs-008 Boost 


Functional description: 


This routine establishes a desired FILEREAD cache size and 
base eceryee according to the size of memory. It finds 
good conti vous ee es at or near the d desire shase and 
sets | a CACH md routine to ink tialize the cache. 

he routine further divided into two pieces: one to do 
cache allocation, and one to do the actual mount and open. 
| SS peceteary for VMB needs to allocate the cache long 
efore 


: ready to accept 10 to the device. 
Calling Sequence: 

; BSBW BOOSCACHE_INIT 

: Inputs: 

- RPB base address 


- actual number of good pages in memory 


APBSL _PFNCNT (R11) 
(R11) - base address of PFN bitmap 


; RPBSO”~PFNMAP+4 
> Implicit inputs: 

: none 

: Outputs: 

it 


RO-R4 altered 
FILSGQ. CACHE set up with size and address of cache 


; Implicit outputs: 
; Table of memory sizes to file cache parameters 


; NOTE: If this table is modified, a cerrespendiog table in VMB around 
: Label MEM_TAB should be checked for consitency. 


EM_CACHE TAME 


ANAEMIA ME WIN HS OD NIA MNES WI  O OD NAME WN 0 OODNOAU EP OOOO 


DOOD IID DDD DDD DDD TTT Be Be EIA 


a et et a = 2 = 2 2s ss - sd 2 ss Ss SS 


MEM_FILE_CACHE 4 2. $ ; 4.1026 ; More than Q megabyte 
MEM_FILE- CACHE A ey 12,64, ; More than 1 megabyte 
MEM_F ILE CACHE eee : dee 31 ; More than 3] ek bytes 
MEM_FILE-CACHE 5° 6,16, 25 ; More than 256k bytes 
0 MEM_FILE-CACHE 0,0, O : 


F 
= BOOTSTRAP FILEREAD I0 FOR nfcro 10-AUG-1984 18:05: AX/VMS Macro V04-0 
B00 vena coal IMT FILEREAD CACHE greet 1SBe 14i8e:08 YOMMAcne OVIROM UMS sBoOTIO.MARe? cf 
1 13 ; BOOSCACHE_ALLOC = The piece that does the allocation. 
1 § ; Outputs: 
! ; FIL$GQ_ CACHE filled in with size/address in blocks 
$ BOOSCACHE_ALLOC:: 
55 bo 9 POSHL 5 ; Save a register 
0000' CF C CLG’ W*FIL$GQ_ CACHE ; Assume no cache available 
50 6B AF be § MOVAL B*MEM_CACHE_TABLE,RO ; Adr of memory size to cache params tbl 
51 #0 108: MOVa (RO)+,R1 ; Get the next table entry 
oo : BEQL 0 ; Branch if memory too small for cache 
55 80 oD MOVL RO)+,R5 3; Max page 
51 4C D1 § CMPL 108 PFNCNT(R11),R1 ; More memory than this eneryt 
F 19 BLSS 1 ; Branch if not, get nex 
50 ; 38 MOVZWL r starting re relative bit tongs), i in A stan 
ef FO 8F — R2,R1 ; Count of bits (pages) to 
FF 8F 7 1 ASHL - P ; Settle for half if can’t find fer 
? B88 OSALLOC_PAGES ; Go get the pages 
i Failed 
0000' CF ; 7D 13 MOVa Rg MOF ILS6O_CACHE i; Success, record the values 
L ; Restore a register 
8ED 14 20$ POP R R i 
0 1? RSB 
i$ : 
13 ; BOOSCACHE_INIT = Full routine to both allocate and open the cache 
0 BOOSCACHE_INIT: 
WAL 3 ocate the cache 
cc 10 1 B58B ‘ BOOSCACHE ALLOC ALL h h 
g ; Fall thru to finish 
¢ ; BOOSCACHE_OPEN = Actually mount the device and fill the cache 
; BOOSCACHE_OPEN:: 
52 OO00'CF oD 8 MOVL W*FIL$GQ_CACHE,R2 ; Pick up size 
ae BEQL 10$ Zero (ength implies none 
3 4 C 0 SUBL #4,SP : Location to store channel 
D 1 MOVL Hy ~ : Address to store channel 
7E 2 C $ SUBL3 -(SP) ; Blocks in d rectory LBN cache 
' b PUSHL skpee {024-F IL$C_SIZE>/ FILSC “DIR “SIZE> ; No. of dir cache entries 
0004 'CF 4 ASHL #9, word L$GQ_CACRE+4,-(SP) yté address from page number 
7E 52 9 7 5 ASHL #9,R2,-(SP)~ § gi2% of cache in bytes 
3 D4 § CLRL =( ERS 3 peek device name string descriptor 
3 dD PUSHL RO : ress to store chann a 
0000' CF 6 FB 8 CALLS #6,W*FILSCACHE_INIT : > t the FILSOPENFILE ca 
3; descriptor returned in PiU $c0_ CACHE 
5E 04 £0 i? ADDL #4,SP : Clean off channel 
r 10$: RSB 
<8 
rt ; BOOSALLOC_PAGES - Find a run of contiguous, good pages 
$8 3; Inputs: 
47; RQ = Page to start at 
48 ; R1 = Number of ages needed 
49 ; R4 = Number willing to settle for 


FOs-b0s. BODSCACHE INIT Oe INIT FICEREAD FOR wicro yee 18Be 1F:98:25 YONA ene SiRom ume spoor10.man’’? 


A : RS = Maximum page 
BA : Outputs: 
BA : CC = Status (BLSS to an error routine) 
BA 3 R2 = Number found 
2A : RS = Starting page number 
BA 5 BOOSALLOC_PAGES: : 
52 17 9 A ROTL #<32-9>,R11,R2 ; PFN of the a 
C af 8 ADOL R2,R : Convert relative PFN to a sheolute 
1) ¢ MOVL RO,R ; Make a gopy of starting b 
C C4 0 ADDL R2,R [NEWee® Bias out of range max value 
0 8) of : 30$ cnet 8 F ; gh lk max page 
OD 48 | EQ cf BBS RQ,@R Aree. PFNMAP+4(R11), ios’: Branch. if this is a good page 
2 C D 4 SUBL3 =R3,R0 ; Count of bits (pages) found 
4 44 5 CMPL R2,R4 ; Found cin 
1 D 66 BGEG 508 > Branch i 
53 50 a. = DA 6 ADOL3 = #1,R0,R3 3 No, reget start ing base 
0 oO D o8 40$ INCL RO ; Next bit (page) 
e4 51—Ss*#F E SOBGTR R1,30$ ; Branch if more to check 
52 0 3 C E 0 SUBL3 = R3,RO,R2 ; Count of bits (pages) found 
4 D1 E 1 CMPL R2,R4 ; Found enough? 
05 OOEA 72 50$: RSB ; Return (Status in CC) 


TIOUVI = BOOTSTRAP F REA “AUG- :05: - 
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wes -SBTTL BOOSIMAGE_ATT = Get image attributes from image header 
: Functional Description: 
BOOSIMAGE_ATT returns to the caller some attributes of the image 
; ; Calling Sequence: 
BSBw BOOSIMAGE_ATT 
; ; Inputs: 


Re = Size of file in blocks 
R35 = Address of image header block (first one only) 


Number 4° image header blocks at the front of the image 
Size mage in blocks excluding the blocks at the end 
td ning local symbols, global symbols, or patch text 


R1 
R2 


3 Outputs: 
BOOSIMAGE ATT: 
MOVZUL. HDSW_SYMDBGOFF(R3),RO ; areate Tee meus INFORMATION? 
yt [NESE _DSTVENCRO) ERS AY : pen as + VBN IN DEBUG SYMBOL TABLE 
MOVAB [NZL _GSTVENCRO) ERS AY : eer cise it VBN IN GLOBAL SYMBOL TABLE 


B 
208: +} HDSW_PATCHOFF(R3),RO ; pM CONTROL INFORMATION? 
MOVAB JHPSL_PATCOMTXT (RO) CR3I,R1 ;_ ADR a al VBN OF PATCH COMMAND TEXT 


palates ea Ms AALAALAALAALAAL AAI AALAALAALAALAAL AAI AAI AALAALAALAALAAIAALAAL AAI ALL AALAAL AAI AA) 
SOMONY— *WIWDWDWIOVVWVVVVWV@WWVVOOOT OOOO 


tt FS S$ “DQDOOOCOOOOSOOOC DO OOOOO0 OOO OWWWWOWWMWoww JIN 


NAME WN OC ODNOA NE WIN  O OD NA NEW 9 OD NIP NE 0 ODIO 


9 B ; PRO 

; 30S: MOV ZBL IHD$B_HDRBLKCNT(R3),R1 : GET IMAGE HEADER BLOCK COUNT 

| SEE IF VBN IS NON ZERO AND THEN IF IT IS SMALLER THAN THE CURRENT SMALLEST 
1 ios: SUBL3. #1, (R1),R1 ; FETCH VBN ~ 1 

1 BLSS 508 ; BRANCH IF NO VBN IS PRESENT 

16 CMPL = R21 ; IS 1T SMALLER THAN THE CURRENT ONE 
1 BLEG ©: 5506 ; BRANCH IF NOT 

1B NOVL R1,R2 > YES, USE IT 

1E 50$:  RSB 


vega" STE LEMASEMDad OM aEaH MUCRO IguseHREs YRSRESOG YANG Mare LOE etorioateit cfs] (Nd 


11 5 ' -SBTTL Common Globals for VMB and SYSBOOT 

iif : the following globals are common to VMB and SYSBOOT and are 

ie : defined here to avoid replicate definitions. 

11F FILSGT_DDSTRING:: ; Default direct tring. 
SD 45 58 45 53 59 53 58 00 iif 3 “TSASCIC /ESYSEXEI/ ppnow eset ghazion. 

1 FILSGT_DDDEV:: ; Default device name 

00 i i -BYTE 0 ; Null ASCIC string 
1 § END 


Lg ae = Sewror rruesvn vo wat vol olen vemos HEE ENCE aE cere Mt 1 te 


BOOSALLOC_PAGES A RG 
CACHE “ALL OC RG 
CACHE IN RG 
CACHE “OPEN RG 

AT RG 


@ 
—< 
st 
oO 
z2a_ = 
—z = 
nunn 


INIT Seeceete ne 
SIZE reneeene x 

eeeerene x 
HE geeneeee x 


fet es aes ee ee 


FN al et 
fESS55 


HORBLKCNT 
HOF F 


“eee He 


“SYMDBGOF F 
LHPSLPATCOMTXT 


1 
LB 
MEM_CACHE _TABLE 
PQ 


RPBSL_IOVEC 
RPBSL ~PFNCNT 
RPBSO_PFNMAP 


ee ere ee eee ee ee eH tH 


PSECT name Allocation PSECT No. Attributes 


, ABS . 000 ( -) 00 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD woe NOVEC BYTE 
SABSS ; 3 -> O71 ¢ 1.) NOPIC USR CON ABS LCL NOSHR EXE RD T NOVEC BYTE 
( 297.) 02 ¢ 2.) NOPIC USR CON LCL NOSHR EXE RD Unt NOVEC BYTE 


Goeweeecoerecooosesesocer$ 


~~ 


Phase Page faults CPU Time Elapsed Time 


Initialization ee 9 —«00:00:00.07  00:00:00.27° 
Command processing :00: 


Pass 
Puss 2 table sort 


Symbol table output 4 :00:00. 
Psect synopsis output :00:00. 
Cross-reference output :00:00. 
Assembler run totals 28 


COWS 


The working set Limit was 900 pages. 


K 
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BOOT ee nun Statistics” SOOTSTRAP FILEREAD 10 RoDULE Fo HfcKO 1g-aus=198s 18:95:08 GAMACHE-UVIROM. VASSBOOTIO.MARSY (1) 


15815 bytes (31 pages) of virtual memory were used te buffer the intermediate 590 e. 
h re were 10 pages of Syaset gable, spare al gi ge hold 186 non-loca ane local symbols. 
source Lines were read in Pass 1 produs ing ob P 


ect records in Pass 
pages of virtual memory were used to de 


ne 11 macros. 


ten meme renee wm ere ten emenane $ 


! Macro Library statistics ! 


mers w eon newness nw enero eeay 


Macro Library name Macros defined 
DISESSTARUORKGS: CeAMA GAMACHE .UV1ROM.VMSJLIBUV1.M 4 
DISKSS GAMACHE .UV1ROM, + VMB.MLB; 

SYSSSYSROOT: ESYSLI ISTAMLET. MLB; 

TOTALS (all Libraries) 


237 GETS were required to define 7 macros. 
There were no errors, warnings or information messages. 
MAC/L1S=L1S$:B00T1OUV1/0BJ=0BJ$:BOOTIOUV! VMS$:BOOUV1SWT+VMS$:B800T10+0BJ$: VMB/LIB+VMS$:LIBUV1/LIB 
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